home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Game / C / CORE! 1.1.CPT / Core! 1.1 / Battle Programs / contest87 / PMJUMP < prev    next >
Encoding:
Text File  |  1989-07-19  |  512 b   |  19 lines  |  [TEXT/MARS]
  1. ;       2ND ICWS COMPETITION ENTRY
  2. ;
  3. ;       NAME :  PMJUMP.1
  4. ;
  5. ;       PROGRAMMER :  PAOLA MONTRASIO
  6. ;
  7. ;        ORG     START
  8. FROM    DAT     0
  9. START   SPL     DOUBLEIMP
  10. INIT    MOV     #11,FROM        ; INIT THE INDEX
  11. LOOP    MOV     @FROM,<10       ; COPY LOOP
  12.         DJN     LOOP,FROM
  13.         SPL     @TO
  14.         ADD     #500,TO
  15.         JMZ     INIT, FROM      ; IF THERE IS AN INVASOR...
  16. TO      DAT     800
  17. DOUBLEIMP MOV   0,2             ; A 'DOUBLE' IMP PROGRAM
  18.         MOV     0,2
  19.         END     START